use English '-no_match_vars';	# match vars slow regexes
my @o = `pwd`;
print @o[0] ;
